home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 8 / developer source - volume 8.iso / orinf / jun96 / hoskf106.gif < prev    next >
Graphics Interchange Format  |  1996-11-16  |  8.5 KB  |  385x348  |  4-bit (12 colors)
   ocr: TIdEVENT Properties 1 e D visible True a ostChange Sub OStChangeo if CIGEVENT.Value - Message rr then embEvent.Bitmap - ErmSched. emblisg.Bitmap elseif EIdEVENT.Value - "Meeting" then embEvent.Bitmap - trmsched. embwtg.Bitmap elseif EIdEVENT.Value = "Call" then embEvent.bitmap - trmsched. embCall.Bitmap elseif CIGEVENT.Value = "Lead" then embEvent.Bitmap - trmsched. embLead.bitmap elseif CIGEVENT.Value - "ToDo" then embEvent.Bitmap - trmsched. emblodo.bitmap elseif EIdEVENT.Value - "Travel" then embEvent.Bitmap - trmsched. embTravel.Bitmap else embEvent.Bitmap - NULL Jend if